/ BBS in a Box 15 / BBS in a box XV-2.iso / Files II / Prog / H-K / HexEdit 1.0.7.sit / Source / HexSearch.c

< prev

next >

MacOS 8.1

Win98

DOS

browse contents

view JSON data

view as text

+--------+-------------------------+-------------------------+--------+--------+
|00000000| 00 0b 48 65 78 53 65 61 | 72 63 68 2e 63 00 00 00 |..HexSea|rch.c...|
|00000010| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000020| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000030| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00000040| 00 54 45 58 54 4b 41 48 | 4c 01 00 00 00 00 00 00 |.TEXTKAH|L.......|
|00000050| 00 00 00 00 00 1c 50 00 | 00 01 bc aa ab b1 59 aa |......P.|......Y.|
|00000060| ab b1 59 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |..Y.....|........|
|00000070| 00 00 00 00 00 00 00 00 | 00 00 81 81 d0 62 00 00 |........|.....b..|
|00000080| 2f 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |/*******|********|
|00000090| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000a0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000b0| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|000000c0| 2a 2a 2a 2a 2a 2a 0d 20 | 2a 20 48 65 78 53 65 61 |******. |* HexSea|
|000000d0| 72 63 68 2e 63 0d 20 2a | 0d 20 2a 20 48 65 78 45 |rch.c. *|. * HexE|
|000000e0| 64 69 74 2c 20 61 20 73 | 69 6d 70 6c 65 20 68 65 |dit, a s|imple he|
|000000f0| 78 20 65 64 69 74 6f 72 | 0d 20 2a 20 63 6f 70 79 |x editor|. * copy|
|00000100| 72 69 67 68 74 20 31 39 | 39 33 2c 20 4a 69 6d 20 |right 19|93, Jim |
|00000110| 42 75 6d 67 61 72 64 6e | 65 72 0d 20 2a 2a 2a 2a |Bumgardn|er. ****|
|00000120| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000130| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000140| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000150| 2a 2a 2a 2a 2a 2a 2a 2a | 2a 2a 2a 2a 2a 2a 2a 2a |********|********|
|00000160| 2a 2f 0d 2f 2f 20 54 6f | 64 6f 3a 0d 2f 2f 20 09 |*/.// To|do:.// .|
|00000170| 09 44 69 73 61 62 6c 65 | 20 73 65 61 72 63 68 20 |.Disable| search |
|00000180| 62 75 74 74 6f 6e 73 20 | 69 66 20 74 65 78 74 20 |buttons |if text |
|00000190| 66 69 65 6c 64 20 69 73 | 20 65 6d 70 74 79 0d 0d |field is| empty..|
|000001a0| 23 69 6e 63 6c 75 64 65 | 20 22 48 65 78 45 64 69 |#include| "HexEdi|
|000001b0| 74 2e 68 22 0d 0d 23 64 | 65 66 69 6e 65 20 53 65 |t.h"..#d|efine Se|
|000001c0| 61 72 63 68 46 6f 72 77 | 61 72 64 49 74 65 6d 09 |archForw|ardItem.|
|000001d0| 31 0d 23 64 65 66 69 6e | 65 20 53 65 61 72 63 68 |1.#defin|e Search|
|000001e0| 42 61 63 6b 77 61 72 64 | 49 74 65 6d 09 32 0d 23 |Backward|Item.2.#|
|000001f0| 64 65 66 69 6e 65 20 48 | 65 78 4d 6f 64 65 49 74 |define H|exModeIt|
|00000200| 65 6d 09 09 09 33 0d 23 | 64 65 66 69 6e 65 20 41 |em...3.#|define A|
|00000210| 73 63 69 69 4d 6f 64 65 | 49 74 65 6d 09 09 34 0d |sciiMode|Item..4.|
|00000220| 23 64 65 66 69 6e 65 20 | 53 65 61 72 63 68 54 65 |#define |SearchTe|
|00000230| 78 74 49 74 65 6d 09 09 | 35 0d 0d 73 68 6f 72 74 |xtItem..|5..short|
|00000240| 09 09 09 67 53 65 61 72 | 63 68 4d 6f 64 65 20 3d |...gSear|chMode =|
|00000250| 20 45 4d 5f 41 73 63 69 | 69 3b 0d 73 68 6f 72 74 | EM_Asci|i;.short|
|00000260| 09 09 09 67 53 65 61 72 | 63 68 44 69 72 20 3d 20 |...gSear|chDir = |
|00000270| 30 3b 09 2f 2f 20 31 20 | 3d 20 62 61 63 6b 77 61 |0;.// 1 |= backwa|
|00000280| 72 64 0d 75 6e 73 69 67 | 6e 65 64 20 63 68 61 72 |rd.unsig|ned char|
|00000290| 09 67 53 65 61 72 63 68 | 42 75 66 66 65 72 5b 32 |.gSearch|Buffer[2|
|000002a0| 35 36 5d 2c 67 53 65 61 | 72 63 68 54 65 78 74 5b |56],gSea|rchText[|
|000002b0| 32 35 36 5d 2c 67 47 6f | 74 6f 54 65 78 74 5b 32 |256],gGo|toText[2|
|000002c0| 35 36 5d 3b 0d 44 69 61 | 6c 6f 67 50 74 72 09 09 |56];.Dia|logPtr..|
|000002d0| 67 53 65 61 72 63 68 57 | 69 6e 3b 0d 42 6f 6f 6c |gSearchW|in;.Bool|
|000002e0| 65 61 6e 20 53 74 72 69 | 6e 67 54 6f 53 65 61 72 |ean Stri|ngToSear|
|000002f0| 63 68 42 75 66 66 65 72 | 28 76 6f 69 64 29 3b 0d |chBuffer|(void);.|
|00000300| 0d 0d 0d 0d 76 6f 69 64 | 20 4f 70 65 6e 53 65 61 |....void| OpenSea|
|00000310| 72 63 68 44 69 61 6c 6f | 67 28 45 64 69 74 57 69 |rchDialo|g(EditWi|
|00000320| 6e 64 6f 77 50 74 72 20 | 64 57 69 6e 29 0d 7b 0d |ndowPtr |dWin).{.|
|00000330| 09 53 74 72 32 35 35 09 | 73 53 74 72 3b 0d 09 2f |.Str255.|sStr;../|
|00000340| 2f 20 49 66 20 44 69 61 | 6c 6f 67 20 57 69 6e 64 |/ If Dia|log Wind|
|00000350| 6f 77 20 69 73 6e 27 74 | 20 6f 70 65 6e 0d 09 69 |ow isn't| open..i|
|00000360| 66 20 28 67 53 65 61 72 | 63 68 57 69 6e 20 3d 3d |f (gSear|chWin ==|
|00000370| 20 4e 55 4c 4c 29 20 7b | 0d 09 09 2f 2f 20 4f 70 | NULL) {|...// Op|
|00000380| 65 6e 20 44 69 61 6c 6f | 67 20 57 69 6e 64 6f 77 |en Dialo|g Window|
|00000390| 0d 09 09 4d 79 53 65 74 | 43 75 72 73 6f 72 28 43 |...MySet|Cursor(C|
|000003a0| 5f 41 72 72 6f 77 29 3b | 0d 09 09 67 53 65 61 72 |_Arrow);|...gSear|
|000003b0| 63 68 57 69 6e 20 3d 20 | 47 65 74 4e 65 77 44 69 |chWin = |GetNewDi|
|000003c0| 61 6c 6f 67 28 53 65 61 | 72 63 68 44 4c 4f 47 2c |alog(Sea|rchDLOG,|
|000003d0| 20 4e 55 4c 4c 2c 20 28 | 57 69 6e 64 6f 77 50 74 | NULL, (|WindowPt|
|000003e0| 72 29 20 2d 31 4c 29 3b | 0d 09 09 69 66 20 28 67 |r) -1L);|...if (g|
|000003f0| 53 65 61 72 63 68 57 69 | 6e 29 20 7b 0d 09 09 09 |SearchWi|n) {....|
|00000400| 2f 2f 20 43 6f 6e 76 65 | 72 74 20 45 78 69 73 74 |// Conve|rt Exist|
|00000410| 69 6e 67 20 53 65 61 72 | 63 68 20 53 63 72 61 70 |ing Sear|ch Scrap|
|00000420| 2c 20 69 66 20 69 74 20 | 65 78 69 73 74 73 20 74 |, if it |exists t|
|00000430| 6f 20 74 65 78 74 0d 09 | 09 09 53 65 74 54 65 78 |o text..|..SetTex|
|00000440| 74 28 67 53 65 61 72 63 | 68 57 69 6e 2c 20 53 65 |t(gSearc|hWin, Se|
|00000450| 61 72 63 68 54 65 78 74 | 49 74 65 6d 2c 20 67 53 |archText|Item, gS|
|00000460| 65 61 72 63 68 54 65 78 | 74 29 3b 0d 0d 09 09 09 |earchTex|t);.....|
|00000470| 2f 2f 20 53 65 74 20 52 | 61 64 69 6f 20 42 75 74 |// Set R|adio But|
|00000480| 74 6f 6e 73 0d 09 09 09 | 53 65 74 43 6f 6e 74 72 |tons....|SetContr|
|00000490| 6f 6c 28 67 53 65 61 72 | 63 68 57 69 6e 2c 20 48 |ol(gSear|chWin, H|
|000004a0| 65 78 4d 6f 64 65 49 74 | 65 6d 2c 20 67 53 65 61 |exModeIt|em, gSea|
|000004b0| 72 63 68 4d 6f 64 65 20 | 3d 3d 20 45 4d 5f 48 65 |rchMode |== EM_He|
|000004c0| 78 29 3b 0d 09 09 09 53 | 65 74 43 6f 6e 74 72 6f |x);....S|etContro|
|000004d0| 6c 28 67 53 65 61 72 63 | 68 57 69 6e 2c 20 41 73 |l(gSearc|hWin, As|
|000004e0| 63 69 69 4d 6f 64 65 49 | 74 65 6d 2c 20 67 53 65 |ciiModeI|tem, gSe|
|000004f0| 61 72 63 68 4d 6f 64 65 | 20 3d 3d 20 45 4d 5f 41 |archMode| == EM_A|
|00000500| 73 63 69 69 29 3b 0d 09 | 09 09 53 65 6c 49 54 65 |scii);..|..SelITe|
|00000510| 78 74 28 67 53 65 61 72 | 63 68 57 69 6e 2c 20 53 |xt(gSear|chWin, S|
|00000520| 65 61 72 63 68 54 65 78 | 74 49 74 65 6d 2c 20 30 |earchTex|tItem, 0|
|00000530| 2c 20 33 32 37 36 37 29 | 3b 0d 09 09 09 53 68 6f |, 32767)|;....Sho|
|00000540| 77 57 69 6e 64 6f 77 28 | 67 53 65 61 72 63 68 57 |wWindow(|gSearchW|
|00000550| 69 6e 29 3b 0d 09 09 7d | 0d 09 7d 0d 09 65 6c 73 |in);...}|..}..els|
|00000560| 65 0d 09 09 53 65 6c 65 | 63 74 57 69 6e 64 6f 77 |e...Sele|ctWindow|
|00000570| 28 67 53 65 61 72 63 68 | 57 69 6e 29 3b 0d 7d 0d |(gSearch|Win);.}.|
|00000580| 0d 76 6f 69 64 20 50 65 | 72 66 6f 72 6d 54 65 78 |.void Pe|rformTex|
|00000590| 74 53 65 61 72 63 68 28 | 45 64 69 74 57 69 6e 64 |tSearch(|EditWind|
|000005a0| 6f 77 50 74 72 20 64 57 | 69 6e 29 0d 7b 0d 09 57 |owPtr dW|in).{..W|
|000005b0| 69 6e 64 6f 77 50 74 72 | 09 77 70 3b 0d 09 73 68 |indowPtr|.wp;..sh|
|000005c0| 6f 72 74 09 09 63 68 2c | 6d 61 74 63 68 49 64 78 |ort..ch,|matchIdx|
|000005d0| 3b 0d 09 6c 6f 6e 67 09 | 09 61 64 64 72 2c 6d 61 |;..long.|.addr,ma|
|000005e0| 74 63 68 41 64 64 72 3b | 0d 0d 09 69 66 20 28 64 |tchAddr;|...if (d|
|000005f0| 57 69 6e 20 3d 3d 20 4e | 55 4c 4c 29 20 7b 0d 09 |Win == N|ULL) {..|
|00000600| 09 2f 2f 20 46 69 6e 64 | 20 61 6e 64 20 53 65 6c |.// Find| and Sel|
|00000610| 65 63 74 20 54 6f 70 20 | 57 69 6e 64 6f 77 0d 09 |ect Top |Window..|
|00000620| 09 77 70 20 3d 20 46 72 | 6f 6e 74 57 69 6e 64 6f |.wp = Fr|ontWindo|
|00000630| 77 28 29 3b 0d 09 09 77 | 68 69 6c 65 20 28 77 70 |w();...w|hile (wp|
|00000640| 20 26 26 20 28 28 57 69 | 6e 64 6f 77 50 65 65 6b | && ((Wi|ndowPeek|
|00000650| 29 20 77 70 29 2d 3e 72 | 65 66 43 6f 6e 20 21 3d |) wp)->r|efCon !=|
|00000660| 20 4d 79 57 69 6e 64 6f | 77 49 44 29 0d 09 09 09 | MyWindo|wID)....|
|00000670| 77 70 20 3d 20 28 57 69 | 6e 64 6f 77 50 74 72 29 |wp = (Wi|ndowPtr)|
|00000680| 20 28 28 57 69 6e 64 6f | 77 50 65 65 6b 29 20 77 | ((Windo|wPeek) w|
|00000690| 70 29 2d 3e 6e 65 78 74 | 57 69 6e 64 6f 77 3b 0d |p)->next|Window;.|
|000006a0| 09 09 69 66 20 28 77 70 | 20 3d 3d 20 4e 55 4c 4c |..if (wp| == NULL|
|000006b0| 20 7c 7c 20 28 28 57 69 | 6e 64 6f 77 50 65 65 6b | || ((Wi|ndowPeek|
|000006c0| 29 20 77 70 29 2d 3e 72 | 65 66 43 6f 6e 20 21 3d |) wp)->r|efCon !=|
|000006d0| 20 4d 79 57 69 6e 64 6f | 77 49 44 29 0d 09 09 09 | MyWindo|wID)....|
|000006e0| 72 65 74 75 72 6e 3b 0d | 09 09 64 57 69 6e 20 3d |return;.|..dWin =|
|000006f0| 20 28 45 64 69 74 57 69 | 6e 64 6f 77 50 74 72 29 | (EditWi|ndowPtr)|
|00000700| 20 77 70 3b 0d 09 7d 0d | 0d 09 4d 79 53 65 74 43 | wp;..}.|..MySetC|
|00000710| 75 72 73 6f 72 28 43 5f | 57 61 74 63 68 29 3b 0d |ursor(C_|Watch);.|
|00000720| 0d 09 2f 2f 20 53 65 61 | 72 63 68 20 69 6e 20 44 |..// Sea|rch in D|
|00000730| 69 72 65 63 74 69 6f 6e | 20 67 53 65 61 72 63 68 |irection| gSearch|
|00000740| 44 69 72 0d 09 2f 2f 20 | 66 6f 72 20 74 65 78 74 |Dir..// |for text|
|00000750| 20 67 53 65 61 72 63 68 | 42 75 66 66 65 72 0d 0d | gSearch|Buffer..|
|00000760| 09 69 66 20 28 67 53 65 | 61 72 63 68 44 69 72 20 |.if (gSe|archDir |
|00000770| 3d 3d 20 30 29 0d 09 09 | 61 64 64 72 20 3d 20 64 |== 0)...|addr = d|
|00000780| 57 69 6e 2d 3e 65 6e 64 | 53 65 6c 3b 0d 09 65 6c |Win->end|Sel;..el|
|00000790| 73 65 20 7b 0d 09 09 61 | 64 64 72 20 3d 20 64 57 |se {...a|ddr = dW|
|000007a0| 69 6e 2d 3e 73 74 61 72 | 74 53 65 6c 20 2d 20 31 |in->star|tSel - 1|
|000007b0| 3b 0d 09 09 69 66 20 28 | 61 64 64 72 20 3c 20 30 |;...if (|addr < 0|
|000007c0| 29 0d 09 09 09 72 65 74 | 75 72 6e 3b 0d 09 7d 0d |)....ret|urn;..}.|
|000007d0| 09 6d 61 74 63 68 49 64 | 78 20 3d 20 30 3b 0d 09 |.matchId|x = 0;..|
|000007e0| 77 68 69 6c 65 20 28 31 | 29 20 7b 0d 09 09 63 68 |while (1|) {...ch|
|000007f0| 20 3d 20 47 65 74 42 79 | 74 65 28 64 57 69 6e 2c | = GetBy|te(dWin,|
|00000800| 20 61 64 64 72 29 3b 0d | 09 09 69 66 20 28 63 68 | addr);.|..if (ch|
|00000810| 20 3d 3d 20 67 53 65 61 | 72 63 68 42 75 66 66 65 | == gSea|rchBuffe|
|00000820| 72 5b 6d 61 74 63 68 49 | 64 78 2b 31 5d 29 20 7b |r[matchI|dx+1]) {|
|00000830| 0d 09 09 09 69 66 20 28 | 6d 61 74 63 68 49 64 78 |....if (|matchIdx|
|00000840| 20 3d 3d 20 30 29 0d 09 | 09 09 09 6d 61 74 63 68 | == 0)..|...match|
|00000850| 41 64 64 72 20 3d 20 61 | 64 64 72 3b 0d 09 09 09 |Addr = a|ddr;....|
|00000860| 2b 2b 6d 61 74 63 68 49 | 64 78 3b 0d 09 09 09 69 |++matchI|dx;....i|
|00000870| 66 20 28 6d 61 74 63 68 | 49 64 78 20 3e 3d 20 67 |f (match|Idx >= g|
|00000880| 53 65 61 72 63 68 42 75 | 66 66 65 72 5b 30 5d 29 |SearchBu|ffer[0])|
|00000890| 0d 09 09 09 09 67 6f 74 | 6f 20 53 75 63 63 65 73 |.....got|o Succes|
|000008a0| 73 3b 0d 09 09 09 2b 2b | 61 64 64 72 3b 0d 09 09 |s;....++|addr;...|
|000008b0| 09 69 66 20 28 61 64 64 | 72 20 3d 3d 20 64 57 69 |.if (add|r == dWi|
|000008c0| 6e 2d 3e 66 69 6c 65 53 | 69 7a 65 29 20 7b 0d 09 |n->fileS|ize) {..|
|000008d0| 09 09 09 6d 61 74 63 68 | 49 64 78 20 3d 20 30 3b |...match|Idx = 0;|
|000008e0| 0d 09 09 09 09 61 64 64 | 72 20 3d 20 6d 61 74 63 |.....add|r = matc|
|000008f0| 68 41 64 64 72 3b 0d 09 | 09 09 7d 0d 09 09 09 65 |hAddr;..|..}....e|
|00000900| 6c 73 65 0d 09 09 09 09 | 63 6f 6e 74 69 6e 75 65 |lse.....|continue|
|00000910| 3b 0d 09 09 7d 0d 09 09 | 65 6c 73 65 20 7b 0d 09 |;...}...|else {..|
|00000920| 09 09 69 66 20 28 6d 61 | 74 63 68 49 64 78 29 20 |..if (ma|tchIdx) |
|00000930| 7b 0d 09 09 09 09 6d 61 | 74 63 68 49 64 78 20 3d |{.....ma|tchIdx =|
|00000940| 20 30 3b 0d 09 09 09 09 | 61 64 64 72 20 3d 20 6d | 0;.....|addr = m|
|00000950| 61 74 63 68 41 64 64 72 | 3b 0d 09 09 09 7d 0d 09 |atchAddr|;....}..|
|00000960| 09 7d 0d 09 09 69 66 20 | 28 67 53 65 61 72 63 68 |.}...if |(gSearch|
|00000970| 44 69 72 20 3d 3d 20 30 | 29 20 7b 0d 09 09 09 2b |Dir == 0|) {....+|
|00000980| 2b 61 64 64 72 3b 0d 09 | 09 09 69 66 20 28 61 64 |+addr;..|..if (ad|
|00000990| 64 72 20 3d 3d 20 64 57 | 69 6e 2d 3e 66 69 6c 65 |dr == dW|in->file|
|000009a0| 53 69 7a 65 29 0d 09 09 | 09 09 67 6f 74 6f 20 46 |Size)...|..goto F|
|000009b0| 61 69 6c 75 72 65 3b 0d | 09 09 7d 0d 09 09 65 6c |ailure;.|..}...el|
|000009c0| 73 65 20 7b 0d 09 09 09 | 2d 2d 61 64 64 72 3b 0d |se {....|--addr;.|
|000009d0| 09 09 09 69 66 20 28 61 | 64 64 72 20 3c 20 30 29 |...if (a|ddr < 0)|
|000009e0| 0d 09 09 09 09 67 6f 74 | 6f 20 46 61 69 6c 75 72 |.....got|o Failur|
|000009f0| 65 3b 0d 09 09 7d 0d 09 | 7d 0d 0d 46 61 69 6c 75 |e;...}..|}..Failu|
|00000a00| 72 65 3a 0d 09 53 79 73 | 42 65 65 70 28 31 29 3b |re:..Sys|Beep(1);|
|00000a10| 0d 09 4d 79 53 65 74 43 | 75 72 73 6f 72 28 43 5f |..MySetC|ursor(C_|
|00000a20| 41 72 72 6f 77 29 3b 0d | 09 72 65 74 75 72 6e 3b |Arrow);.|.return;|
|00000a30| 0d 0d 53 75 63 63 65 73 | 73 3a 0d 09 69 66 20 28 |..Succes|s:..if (|
|00000a40| 64 57 69 6e 20 21 3d 20 | 28 45 64 69 74 57 69 6e |dWin != |(EditWin|
|00000a50| 64 6f 77 50 74 72 29 20 | 46 72 6f 6e 74 57 69 6e |dowPtr) |FrontWin|
|00000a60| 64 6f 77 28 29 29 0d 09 | 09 53 65 6c 65 63 74 57 |dow())..|.SelectW|
|00000a70| 69 6e 64 6f 77 28 28 57 | 69 6e 64 6f 77 50 74 72 |indow((W|indowPtr|
|00000a80| 29 20 64 57 69 6e 29 3b | 0d 09 64 57 69 6e 2d 3e |) dWin);|..dWin->|
|00000a90| 73 74 61 72 74 53 65 6c | 20 3d 20 6d 61 74 63 68 |startSel| = match|
|00000aa0| 41 64 64 72 3b 0d 09 64 | 57 69 6e 2d 3e 65 6e 64 |Addr;..d|Win->end|
|00000ab0| 53 65 6c 20 3d 20 64 57 | 69 6e 2d 3e 73 74 61 72 |Sel = dW|in->star|
|00000ac0| 74 53 65 6c 20 2b 20 67 | 53 65 61 72 63 68 42 75 |tSel + g|SearchBu|
|00000ad0| 66 66 65 72 5b 30 5d 3b | 0d 0d 09 53 63 72 6f 6c |ffer[0];|...Scrol|
|00000ae0| 6c 54 6f 53 65 6c 65 63 | 74 69 6f 6e 28 64 57 69 |lToSelec|tion(dWi|
|00000af0| 6e 2c 20 64 57 69 6e 2d | 3e 73 74 61 72 74 53 65 |n, dWin-|>startSe|
|00000b00| 6c 2c 20 74 72 75 65 2c | 20 74 72 75 65 29 3b 0d |l, true,| true);.|
|00000b10| 09 4d 79 53 65 74 43 75 | 72 73 6f 72 28 43 5f 41 |.MySetCu|rsor(C_A|
|00000b20| 72 72 6f 77 29 3b 0d 7d | 0d 0d 0d 23 64 65 66 69 |rrow);.}|...#defi|
|00000b30| 6e 65 20 47 41 64 64 72 | 49 74 65 6d 09 09 09 33 |ne GAddr|Item...3|
|00000b40| 0d 23 64 65 66 69 6e 65 | 20 47 48 65 78 49 74 65 |.#define| GHexIte|
|00000b50| 6d 09 09 09 34 0d 23 64 | 65 66 69 6e 65 20 47 41 |m...4.#d|efine GA|
|00000b60| 73 63 69 69 49 74 65 6d | 09 09 09 35 0d 23 64 65 |sciiItem|...5.#de|
|00000b70| 66 69 6e 65 20 47 55 73 | 65 72 49 74 65 6d 09 09 |fine GUs|erItem..|
|00000b80| 09 36 0d 0d 70 61 73 63 | 61 6c 20 76 6f 69 64 20 |.6..pasc|al void |
|00000b90| 47 6f 74 6f 55 73 65 72 | 49 74 65 6d 28 44 69 61 |GotoUser|Item(Dia|
|00000ba0| 6c 6f 67 50 74 72 20 64 | 70 2c 20 73 68 6f 72 74 |logPtr d|p, short|
|00000bb0| 20 69 74 65 6d 4e 62 72 | 29 0d 7b 0d 09 73 77 69 | itemNbr|).{..swi|
|00000bc0| 74 63 68 20 28 69 74 65 | 6d 4e 62 72 29 20 7b 0d |tch (ite|mNbr) {.|
|00000bd0| 09 63 61 73 65 20 47 55 | 73 65 72 49 74 65 6d 3a |.case GU|serItem:|
|00000be0| 0d 09 09 4d 79 4f 75 74 | 6c 69 6e 65 42 75 74 74 |...MyOut|lineButt|
|00000bf0| 6f 6e 28 64 70 2c 20 4f | 4b 2c 20 62 6c 61 63 6b |on(dp, O|K, black|
|00000c00| 29 3b 0d 09 09 62 72 65 | 61 6b 3b 0d 09 7d 0d 09 |);...bre|ak;..}..|
|00000c10| 0d 7d 0d 0d 76 6f 69 64 | 20 47 6f 74 6f 41 64 64 |.}..void| GotoAdd|
|00000c20| 72 65 73 73 28 45 64 69 | 74 57 69 6e 64 6f 77 50 |ress(Edi|tWindowP|
|00000c30| 74 72 20 64 57 69 6e 29 | 0d 7b 0d 09 47 72 61 66 |tr dWin)|.{..Graf|
|00000c40| 50 74 72 09 09 73 61 76 | 65 50 6f 72 74 3b 0d 09 |Ptr..sav|ePort;..|
|00000c50| 44 69 61 6c 6f 67 50 74 | 72 09 64 70 3b 0d 09 73 |DialogPt|r.dp;..s|
|00000c60| 68 6f 72 74 09 09 69 74 | 65 6d 48 69 74 3b 0d 09 |hort..it|emHit;..|
|00000c70| 73 68 6f 72 74 09 09 74 | 3b 0d 09 48 61 6e 64 6c |short..t|;..Handl|
|00000c80| 65 09 09 68 3b 0d 09 52 | 65 63 74 09 09 72 3b 0d |e..h;..R|ect..r;.|
|00000c90| 0d 09 47 65 74 50 6f 72 | 74 28 26 73 61 76 65 50 |..GetPor|t(&saveP|
|00000ca0| 6f 72 74 29 3b 0d 09 4d | 79 53 65 74 43 75 72 73 |ort);..M|ySetCurs|
|00000cb0| 6f 72 28 43 5f 41 72 72 | 6f 77 29 3b 0d 09 64 70 |or(C_Arr|ow);..dp|
|00000cc0| 20 3d 20 47 65 74 4e 65 | 77 44 69 61 6c 6f 67 28 | = GetNe|wDialog(|
|00000cd0| 47 6f 74 6f 44 4c 4f 47 | 2c 20 4e 55 4c 4c 2c 20 |GotoDLOG|, NULL, |
|00000ce0| 28 57 69 6e 64 6f 77 50 | 74 72 29 20 2d 31 4c 29 |(WindowP|tr) -1L)|
|00000cf0| 3b 0d 09 69 66 20 28 64 | 70 20 3d 3d 20 4e 55 4c |;..if (d|p == NUL|
|00000d00| 4c 29 0d 09 09 72 65 74 | 75 72 6e 3b 0d 09 47 65 |L)...ret|urn;..Ge|
|00000d10| 74 44 49 74 65 6d 28 64 | 70 2c 20 47 55 73 65 72 |tDItem(d|p, GUser|
|00000d20| 49 74 65 6d 2c 20 26 74 | 2c 20 26 68 2c 20 26 72 |Item, &t|, &h, &r|
|00000d30| 29 3b 0d 09 53 65 74 44 | 49 74 65 6d 28 64 70 2c |);..SetD|Item(dp,|
|00000d40| 20 47 55 73 65 72 49 74 | 65 6d 2c 20 74 2c 20 28 | GUserIt|em, t, (|
|00000d50| 48 61 6e 64 6c 65 29 20 | 47 6f 74 6f 55 73 65 72 |Handle) |GotoUser|
|00000d60| 49 74 65 6d 2c 20 26 72 | 29 3b 0d 0d 09 53 65 74 |Item, &r|);...Set|
|00000d70| 54 65 78 74 28 64 70 2c | 20 47 41 64 64 72 49 74 |Text(dp,| GAddrIt|
|00000d80| 65 6d 2c 20 67 47 6f 74 | 6f 54 65 78 74 29 3b 0d |em, gGot|oText);.|
|00000d90| 09 2f 2f 20 53 65 74 20 | 52 61 64 69 6f 20 42 75 |.// Set |Radio Bu|
|00000da0| 74 74 6f 6e 73 0d 09 53 | 65 74 43 6f 6e 74 72 6f |ttons..S|etContro|
|00000db0| 6c 28 64 70 2c 20 47 48 | 65 78 49 74 65 6d 2c 20 |l(dp, GH|exItem, |
|00000dc0| 67 50 72 65 66 73 2e 64 | 65 63 69 6d 61 6c 41 64 |gPrefs.d|ecimalAd|
|00000dd0| 64 72 20 3d 3d 20 45 4d | 5f 48 65 78 29 3b 0d 09 |dr == EM|_Hex);..|
|00000de0| 53 65 74 43 6f 6e 74 72 | 6f 6c 28 64 70 2c 20 47 |SetContr|ol(dp, G|
|00000df0| 41 73 63 69 69 49 74 65 | 6d 2c 20 67 50 72 65 66 |AsciiIte|m, gPref|
|00000e00| 73 2e 64 65 63 69 6d 61 | 6c 41 64 64 72 20 3d 3d |s.decima|lAddr ==|
|00000e10| 20 45 4d 5f 41 73 63 69 | 69 29 3b 0d 09 53 65 6c | EM_Asci|i);..Sel|
|00000e20| 49 54 65 78 74 28 64 70 | 2c 20 47 41 64 64 72 49 |IText(dp|, GAddrI|
|00000e30| 74 65 6d 2c 20 30 2c 20 | 33 32 37 36 37 29 3b 0d |tem, 0, |32767);.|
|00000e40| 09 53 68 6f 77 57 69 6e | 64 6f 77 28 64 70 29 3b |.ShowWin|dow(dp);|
|00000e50| 0d 09 64 6f 20 7b 0d 09 | 09 4d 6f 64 61 6c 44 69 |..do {..|.ModalDi|
|00000e60| 61 6c 6f 67 28 4e 55 4c | 4c 2c 20 26 69 74 65 6d |alog(NUL|L, &item|
|00000e70| 48 69 74 29 3b 0d 09 09 | 73 77 69 74 63 68 20 28 |Hit);...|switch (|
|00000e80| 69 74 65 6d 48 69 74 29 | 20 7b 0d 09 09 63 61 73 |itemHit)| {...cas|
|00000e90| 65 20 4f 4b 3a 0d 09 09 | 09 47 65 74 54 65 78 74 |e OK:...|.GetText|
|00000ea0| 28 64 70 2c 20 47 41 64 | 64 72 49 74 65 6d 2c 20 |(dp, GAd|drItem, |
|00000eb0| 67 47 6f 74 6f 54 65 78 | 74 29 3b 0d 09 09 63 61 |gGotoTex|t);...ca|
|00000ec0| 73 65 20 43 61 6e 63 65 | 6c 3a 0d 09 09 09 62 72 |se Cance|l:....br|
|00000ed0| 65 61 6b 3b 0d 09 09 63 | 61 73 65 20 47 48 65 78 |eak;...c|ase GHex|
|00000ee0| 49 74 65 6d 3a 0d 09 09 | 09 67 50 72 65 66 73 2e |Item:...|.gPrefs.|
|00000ef0| 64 65 63 69 6d 61 6c 41 | 64 64 72 20 3d 20 45 4d |decimalA|ddr = EM|
|00000f00| 5f 48 65 78 3b 0d 09 09 | 09 53 65 74 43 6f 6e 74 |_Hex;...|.SetCont|
|00000f10| 72 6f 6c 28 64 70 2c 20 | 47 48 65 78 49 74 65 6d |rol(dp, |GHexItem|
|00000f20| 2c 20 67 50 72 65 66 73 | 2e 64 65 63 69 6d 61 6c |, gPrefs|.decimal|
|00000f30| 41 64 64 72 20 3d 3d 20 | 45 4d 5f 48 65 78 29 3b |Addr == |EM_Hex);|
|00000f40| 0d 09 09 09 53 65 74 43 | 6f 6e 74 72 6f 6c 28 64 |....SetC|ontrol(d|
|00000f50| 70 2c 20 47 41 73 63 69 | 69 49 74 65 6d 2c 20 67 |p, GAsci|iItem, g|
|00000f60| 50 72 65 66 73 2e 64 65 | 63 69 6d 61 6c 41 64 64 |Prefs.de|cimalAdd|
|00000f70| 72 20 3d 3d 20 45 4d 5f | 41 73 63 69 69 29 3b 0d |r == EM_|Ascii);.|
|00000f80| 09 09 09 62 72 65 61 6b | 3b 0d 09 09 63 61 73 65 |...break|;...case|
|00000f90| 20 47 41 73 63 69 69 49 | 74 65 6d 3a 0d 09 09 09 | GAsciiI|tem:....|
|00000fa0| 67 50 72 65 66 73 2e 64 | 65 63 69 6d 61 6c 41 64 |gPrefs.d|ecimalAd|
|00000fb0| 64 72 20 3d 20 45 4d 5f | 41 73 63 69 69 3b 0d 09 |dr = EM_|Ascii;..|
|00000fc0| 09 09 53 65 74 43 6f 6e | 74 72 6f 6c 28 64 70 2c |..SetCon|trol(dp,|
|00000fd0| 20 47 48 65 78 49 74 65 | 6d 2c 20 67 50 72 65 66 | GHexIte|m, gPref|
|00000fe0| 73 2e 64 65 63 69 6d 61 | 6c 41 64 64 72 20 3d 3d |s.decima|lAddr ==|
|00000ff0| 20 45 4d 5f 48 65 78 29 | 3b 0d 09 09 09 53 65 74 | EM_Hex)|;....Set|
|00001000| 43 6f 6e 74 72 6f 6c 28 | 64 70 2c 20 47 41 73 63 |Control(|dp, GAsc|
|00001010| 69 69 49 74 65 6d 2c 20 | 67 50 72 65 66 73 2e 64 |iiItem, |gPrefs.d|
|00001020| 65 63 69 6d 61 6c 41 64 | 64 72 20 3d 3d 20 45 4d |ecimalAd|dr == EM|
|00001030| 5f 41 73 63 69 69 29 3b | 0d 09 09 09 62 72 65 61 |_Ascii);|....brea|
|00001040| 6b 3b 0d 09 09 7d 0d 09 | 7d 20 77 68 69 6c 65 20 |k;...}..|} while |
|00001050| 28 69 74 65 6d 48 69 74 | 20 21 3d 20 4f 4b 20 26 |(itemHit| != OK &|
|00001060| 26 20 69 74 65 6d 48 69 | 74 20 21 3d 20 43 61 6e |& itemHi|t != Can|
|00001070| 63 65 6c 29 3b 0d 09 44 | 69 73 70 6f 73 44 69 61 |cel);..D|isposDia|
|00001080| 6c 6f 67 28 64 70 29 3b | 0d 09 53 65 74 50 6f 72 |log(dp);|..SetPor|
|00001090| 74 28 73 61 76 65 50 6f | 72 74 29 3b 0d 09 69 66 |t(savePo|rt);..if|
|000010a0| 20 28 69 74 65 6d 48 69 | 74 20 3d 3d 20 4f 4b 29 | (itemHi|t == OK)|
|000010b0| 20 7b 0d 09 09 6c 6f 6e | 67 09 09 61 64 64 72 20 | {...lon|g..addr |
|000010c0| 3d 20 2d 31 3b 0d 09 09 | 73 68 6f 72 74 09 09 72 |= -1;...|short..r|
|000010d0| 3b 0d 0d 09 09 50 74 6f | 43 73 74 72 28 67 47 6f |;....Pto|Cstr(gGo|
|000010e0| 74 6f 54 65 78 74 29 3b | 0d 09 09 69 66 20 28 67 |toText);|...if (g|
|000010f0| 50 72 65 66 73 2e 64 65 | 63 69 6d 61 6c 41 64 64 |Prefs.de|cimalAdd|
|00001100| 72 20 3d 3d 20 45 4d 5f | 48 65 78 29 0d 09 09 09 |r == EM_|Hex)....|
|00001110| 72 20 3d 20 73 73 63 61 | 6e 66 28 28 63 68 61 72 |r = ssca|nf((char|
|00001120| 20 2a 29 20 67 47 6f 74 | 6f 54 65 78 74 2c 22 25 | *) gGot|oText,"%|
|00001130| 6c 78 22 2c 26 61 64 64 | 72 29 3b 0d 09 09 65 6c |lx",&add|r);...el|
|00001140| 73 65 0d 09 09 09 72 20 | 3d 20 73 73 63 61 6e 66 |se....r |= sscanf|
|00001150| 28 28 63 68 61 72 20 2a | 29 20 67 47 6f 74 6f 54 |((char *|) gGotoT|
|00001160| 65 78 74 2c 22 25 6c 64 | 22 2c 26 61 64 64 72 29 |ext,"%ld|",&addr)|
|00001170| 3b 0d 09 09 43 74 6f 50 | 73 74 72 28 28 63 68 61 |;...CtoP|str((cha|
|00001180| 72 20 2a 29 20 67 47 6f | 74 6f 54 65 78 74 29 3b |r *) gGo|toText);|
|00001190| 0d 09 09 69 66 20 28 72 | 20 3d 3d 20 31 20 26 26 |...if (r| == 1 &&|
|000011a0| 20 61 64 64 72 20 3e 3d | 20 30 20 26 26 20 61 64 | addr >=| 0 && ad|
|000011b0| 64 72 20 3c 20 64 57 69 | 6e 2d 3e 66 69 6c 65 53 |dr < dWi|n->fileS|
|000011c0| 69 7a 65 29 20 7b 0d 09 | 09 09 64 57 69 6e 2d 3e |ize) {..|..dWin->|
|000011d0| 73 74 61 72 74 53 65 6c | 20 3d 20 64 57 69 6e 2d |startSel| = dWin-|
|000011e0| 3e 65 6e 64 53 65 6c 20 | 3d 20 61 64 64 72 3b 0d |>endSel |= addr;.|
|000011f0| 09 09 09 53 63 72 6f 6c | 6c 54 6f 53 65 6c 65 63 |...Scrol|lToSelec|
|00001200| 74 69 6f 6e 28 64 57 69 | 6e 2c 20 61 64 64 72 2c |tion(dWi|n, addr,|
|00001210| 20 74 72 75 65 2c 20 74 | 72 75 65 29 3b 0d 09 09 | true, t|rue);...|
|00001220| 7d 0d 09 7d 0d 7d 0d 0d | 0d 76 6f 69 64 20 44 6f |}..}.}..|.void Do|
|00001230| 4d 6f 64 65 6c 65 73 73 | 44 69 61 6c 6f 67 45 76 |Modeless|DialogEv|
|00001240| 65 6e 74 28 45 76 65 6e | 74 52 65 63 6f 72 64 20 |ent(Even|tRecord |
|00001250| 2a 74 68 65 45 76 65 6e | 74 29 0d 7b 0d 09 44 69 |*theEven|t).{..Di|
|00001260| 61 6c 6f 67 50 74 72 09 | 77 68 69 63 68 44 6c 6f |alogPtr.|whichDlo|
|00001270| 67 3b 0d 09 73 68 6f 72 | 74 09 09 69 74 65 6d 48 |g;..shor|t..itemH|
|00001280| 69 74 3b 0d 09 2f 2f 20 | 44 6f 20 45 76 65 6e 74 |it;..// |Do Event|
|00001290| 20 46 69 6c 74 65 72 69 | 6e 67 0d 09 69 66 20 28 | Filteri|ng..if (|
|000012a0| 74 68 65 45 76 65 6e 74 | 2d 3e 77 68 61 74 20 3d |theEvent|->what =|
|000012b0| 3d 20 6b 65 79 44 6f 77 | 6e 29 20 7b 0d 09 09 2f |= keyDow|n) {.../|
|000012c0| 2f 20 50 72 6f 63 65 73 | 73 20 45 64 69 74 20 4b |/ Proces|s Edit K|
|000012d0| 65 79 73 0d 09 09 69 66 | 20 28 28 74 68 65 45 76 |eys...if| ((theEv|
|000012e0| 65 6e 74 2d 3e 6d 65 73 | 73 61 67 65 20 26 20 63 |ent->mes|sage & c|
|000012f0| 68 61 72 43 6f 64 65 4d | 61 73 6b 29 20 3d 3d 20 |harCodeM|ask) == |
|00001300| 27 5c 72 27 29 20 7b 0d | 09 09 09 77 68 69 63 68 |'\r') {.|...which|
|00001310| 44 6c 6f 67 20 3d 20 46 | 72 6f 6e 74 57 69 6e 64 |Dlog = F|rontWind|
|00001320| 6f 77 28 29 3b 0d 09 09 | 09 69 74 65 6d 48 69 74 |ow();...|.itemHit|
|00001330| 20 3d 20 4f 4b 3b 0d 09 | 09 09 4d 79 53 69 6d 75 | = OK;..|..MySimu|
|00001340| 6c 61 74 65 42 75 74 74 | 6f 6e 50 72 65 73 73 28 |lateButt|onPress(|
|00001350| 77 68 69 63 68 44 6c 6f | 67 2c 20 4f 4b 29 3b 0d |whichDlo|g, OK);.|
|00001360| 09 09 09 67 6f 74 6f 20 | 42 75 74 74 6f 6e 48 69 |...goto |ButtonHi|
|00001370| 74 3b 0d 09 09 7d 0d 09 | 09 69 66 20 28 74 68 65 |t;...}..|.if (the|
|00001380| 45 76 65 6e 74 2d 3e 6d | 6f 64 69 66 69 65 72 73 |Event->m|odifiers|
|00001390| 20 26 20 63 6d 64 4b 65 | 79 29 20 7b 0d 09 09 09 | & cmdKe|y) {....|
|000013a0| 73 77 69 74 63 68 20 28 | 28 74 68 65 45 76 65 6e |switch (|(theEven|
|000013b0| 74 2d 3e 6d 65 73 73 61 | 67 65 20 26 20 6b 65 79 |t->messa|ge & key|
|000013c0| 43 6f 64 65 4d 61 73 6b | 29 20 3e 3e 20 38 29 20 |CodeMask|) >> 8) |
|000013d0| 7b 0d 09 09 09 63 61 73 | 65 20 30 78 30 44 3a 09 |{....cas|e 0x0D:.|
|000013e0| 2f 2f 20 57 0d 09 09 09 | 09 44 69 73 70 6f 73 44 |// W....|.DisposD|
|000013f0| 69 61 6c 6f 67 28 67 53 | 65 61 72 63 68 57 69 6e |ialog(gS|earchWin|
|00001400| 29 3b 0d 09 09 09 09 67 | 53 65 61 72 63 68 57 69 |);.....g|SearchWi|
|00001410| 6e 20 3d 20 4e 55 4c 4c | 3b 0d 09 09 09 09 72 65 |n = NULL|;.....re|
|00001420| 74 75 72 6e 3b 0d 09 09 | 09 63 61 73 65 20 30 78 |turn;...|.case 0x|
|00001430| 30 43 3a 09 2f 2f 20 51 | 0d 09 09 09 09 69 66 20 |0C:.// Q|.....if |
|00001440| 28 43 6c 6f 73 65 41 6c | 6c 45 64 69 74 57 69 6e |(CloseAl|lEditWin|
|00001450| 64 6f 77 73 28 29 29 0d | 09 09 09 09 09 67 51 75 |dows()).|.....gQu|
|00001460| 69 74 46 6c 61 67 20 3d | 20 74 72 75 65 3b 0d 09 |itFlag =| true;..|
|00001470| 09 09 09 72 65 74 75 72 | 6e 3b 0d 09 09 09 7d 0d |...retur|n;....}.|
|00001480| 09 09 7d 0d 09 7d 0d 09 | 69 66 28 44 69 61 6c 6f |..}..}..|if(Dialo|
|00001490| 67 53 65 6c 65 63 74 28 | 74 68 65 45 76 65 6e 74 |gSelect(|theEvent|
|000014a0| 2c 20 26 77 68 69 63 68 | 44 6c 6f 67 2c 20 26 69 |, &which|Dlog, &i|
|000014b0| 74 65 6d 48 69 74 29 29 | 20 7b 0d 42 75 74 74 6f |temHit))| {.Butto|
|000014c0| 6e 48 69 74 3a 0d 09 09 | 69 66 20 28 77 68 69 63 |nHit:...|if (whic|
|000014d0| 68 44 6c 6f 67 20 3d 3d | 20 67 53 65 61 72 63 68 |hDlog ==| gSearch|
|000014e0| 57 69 6e 29 20 7b 0d 09 | 09 09 73 77 69 74 63 68 |Win) {..|..switch|
|000014f0| 20 28 69 74 65 6d 48 69 | 74 29 20 7b 0d 09 09 09 | (itemHi|t) {....|
|00001500| 63 61 73 65 20 53 65 61 | 72 63 68 46 6f 72 77 61 |case Sea|rchForwa|
|00001510| 72 64 49 74 65 6d 3a 0d | 09 09 09 63 61 73 65 20 |rdItem:.|...case |
|00001520| 53 65 61 72 63 68 42 61 | 63 6b 77 61 72 64 49 74 |SearchBa|ckwardIt|
|00001530| 65 6d 3a 0d 09 09 09 09 | 67 53 65 61 72 63 68 44 |em:.....|gSearchD|
|00001540| 69 72 20 3d 20 28 69 74 | 65 6d 48 69 74 20 3d 3d |ir = (it|emHit ==|
|00001550| 20 53 65 61 72 63 68 42 | 61 63 6b 77 61 72 64 49 | SearchB|ackwardI|
|00001560| 74 65 6d 29 3b 0d 09 09 | 09 09 47 65 74 54 65 78 |tem);...|..GetTex|
|00001570| 74 28 67 53 65 61 72 63 | 68 57 69 6e 2c 20 53 65 |t(gSearc|hWin, Se|
|00001580| 61 72 63 68 54 65 78 74 | 49 74 65 6d 2c 20 67 53 |archText|Item, gS|
|00001590| 65 61 72 63 68 54 65 78 | 74 29 3b 0d 09 09 09 09 |earchTex|t);.....|
|000015a0| 69 66 20 28 53 74 72 69 | 6e 67 54 6f 53 65 61 72 |if (Stri|ngToSear|
|000015b0| 63 68 42 75 66 66 65 72 | 28 29 29 20 7b 0d 09 09 |chBuffer|()) {...|
|000015c0| 09 09 09 50 65 72 66 6f | 72 6d 54 65 78 74 53 65 |...Perfo|rmTextSe|
|000015d0| 61 72 63 68 28 4e 55 4c | 4c 29 3b 0d 09 09 09 09 |arch(NUL|L);.....|
|000015e0| 7d 0d 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |}.....br|eak;....|
|000015f0| 63 61 73 65 20 48 65 78 | 4d 6f 64 65 49 74 65 6d |case Hex|ModeItem|
|00001600| 3a 0d 09 09 09 09 67 53 | 65 61 72 63 68 4d 6f 64 |:.....gS|earchMod|
|00001610| 65 20 3d 20 45 4d 5f 48 | 65 78 3b 0d 09 09 09 09 |e = EM_H|ex;.....|
|00001620| 53 65 74 43 6f 6e 74 72 | 6f 6c 28 67 53 65 61 72 |SetContr|ol(gSear|
|00001630| 63 68 57 69 6e 2c 20 48 | 65 78 4d 6f 64 65 49 74 |chWin, H|exModeIt|
|00001640| 65 6d 2c 20 67 53 65 61 | 72 63 68 4d 6f 64 65 20 |em, gSea|rchMode |
|00001650| 3d 3d 20 45 4d 5f 48 65 | 78 29 3b 0d 09 09 09 09 |== EM_He|x);.....|
|00001660| 53 65 74 43 6f 6e 74 72 | 6f 6c 28 67 53 65 61 72 |SetContr|ol(gSear|
|00001670| 63 68 57 69 6e 2c 20 41 | 73 63 69 69 4d 6f 64 65 |chWin, A|sciiMode|
|00001680| 49 74 65 6d 2c 20 67 53 | 65 61 72 63 68 4d 6f 64 |Item, gS|earchMod|
|00001690| 65 20 3d 3d 20 45 4d 5f | 41 73 63 69 69 29 3b 0d |e == EM_|Ascii);.|
|000016a0| 09 09 09 09 62 72 65 61 | 6b 3b 0d 09 09 09 63 61 |....brea|k;....ca|
|000016b0| 73 65 20 41 73 63 69 69 | 4d 6f 64 65 49 74 65 6d |se Ascii|ModeItem|
|000016c0| 3a 0d 09 09 09 09 67 53 | 65 61 72 63 68 4d 6f 64 |:.....gS|earchMod|
|000016d0| 65 20 3d 20 45 4d 5f 41 | 73 63 69 69 3b 0d 09 09 |e = EM_A|scii;...|
|000016e0| 09 09 53 65 74 43 6f 6e | 74 72 6f 6c 28 67 53 65 |..SetCon|trol(gSe|
|000016f0| 61 72 63 68 57 69 6e 2c | 20 48 65 78 4d 6f 64 65 |archWin,| HexMode|
|00001700| 49 74 65 6d 2c 20 67 53 | 65 61 72 63 68 4d 6f 64 |Item, gS|earchMod|
|00001710| 65 20 3d 3d 20 45 4d 5f | 48 65 78 29 3b 0d 09 09 |e == EM_|Hex);...|
|00001720| 09 09 53 65 74 43 6f 6e | 74 72 6f 6c 28 67 53 65 |..SetCon|trol(gSe|
|00001730| 61 72 63 68 57 69 6e 2c | 20 41 73 63 69 69 4d 6f |archWin,| AsciiMo|
|00001740| 64 65 49 74 65 6d 2c 20 | 67 53 65 61 72 63 68 4d |deItem, |gSearchM|
|00001750| 6f 64 65 20 3d 3d 20 45 | 4d 5f 41 73 63 69 69 29 |ode == E|M_Ascii)|
|00001760| 3b 0d 09 09 09 09 62 72 | 65 61 6b 3b 0d 09 09 09 |;.....br|eak;....|
|00001770| 63 61 73 65 20 53 65 61 | 72 63 68 54 65 78 74 49 |case Sea|rchTextI|
|00001780| 74 65 6d 3a 0d 09 09 09 | 09 62 72 65 61 6b 3b 0d |tem:....|.break;.|
|00001790| 09 09 09 7d 0d 09 09 7d | 0d 09 7d 0d 09 65 6c 73 |...}...}|..}..els|
|000017a0| 65 20 7b 0d 2f 2a 09 09 | 73 77 69 74 63 68 20 28 |e {./*..|switch (|
|000017b0| 74 68 65 45 76 65 6e 74 | 2d 3e 77 68 61 74 29 20 |theEvent|->what) |
|000017c0| 7b 2a 2f 0d 2f 2a 09 09 | 63 61 73 65 20 75 70 64 |{*/./*..|case upd|
|000017d0| 61 74 65 45 76 74 3a 2a | 2f 0d 2f 2a 09 09 09 4d |ateEvt:*|/./*...M|
|000017e0| 79 44 6f 45 76 65 6e 74 | 28 74 68 65 45 76 65 6e |yDoEvent|(theEven|
|000017f0| 74 29 3b 2a 2f 0d 2f 2a | 09 09 09 62 72 65 61 6b |t);*/./*|...break|
|00001800| 3b 2a 2f 0d 2f 2a 09 09 | 7d 2a 2f 0d 09 09 69 66 |;*/./*..|}*/...if|
|00001810| 20 28 74 68 65 45 76 65 | 6e 74 2d 3e 77 68 61 74 | (theEve|nt->what|
|00001820| 20 3d 3d 20 75 70 64 61 | 74 65 45 76 74 20 26 26 | == upda|teEvt &&|
|00001830| 20 77 68 69 63 68 44 6c | 6f 67 20 3d 3d 20 67 53 | whichDl|og == gS|
|00001840| 65 61 72 63 68 57 69 6e | 29 0d 09 09 09 4d 79 4f |earchWin|)....MyO|
|00001850| 75 74 6c 69 6e 65 42 75 | 74 74 6f 6e 28 67 53 65 |utlineBu|tton(gSe|
|00001860| 61 72 63 68 57 69 6e 2c | 20 53 65 61 72 63 68 46 |archWin,| SearchF|
|00001870| 6f 72 77 61 72 64 49 74 | 65 6d 2c 20 62 6c 61 63 |orwardIt|em, blac|
|00001880| 6b 29 3b 0d 09 7d 0d 7d | 0d 0d 42 6f 6f 6c 65 61 |k);..}.}|..Boolea|
|00001890| 6e 20 53 74 72 69 6e 67 | 54 6f 53 65 61 72 63 68 |n String|ToSearch|
|000018a0| 42 75 66 66 65 72 28 76 | 6f 69 64 29 0d 7b 0d 09 |Buffer(v|oid).{..|
|000018b0| 50 74 72 09 09 09 09 73 | 70 2c 20 64 70 3b 0d 09 |Ptr....s|p, dp;..|
|000018c0| 73 68 6f 72 74 09 09 09 | 69 3b 0d 09 73 68 6f 72 |short...|i;..shor|
|000018d0| 74 09 09 09 76 61 6c 3b | 0d 09 42 6f 6f 6c 65 61 |t...val;|..Boolea|
|000018e0| 6e 09 09 09 6c 6f 46 6c | 61 67 3b 0d 0d 09 2f 2f |n...loFl|ag;...//|
|000018f0| 20 43 6f 6e 76 65 72 74 | 20 53 74 72 69 6e 67 20 | Convert| String |
|00001900| 74 6f 20 67 53 65 61 72 | 63 68 42 75 66 66 65 72 |to gSear|chBuffer|
|00001910| 0d 09 69 66 20 28 67 53 | 65 61 72 63 68 4d 6f 64 |..if (gS|earchMod|
|00001920| 65 20 3d 3d 20 45 4d 5f | 48 65 78 29 20 7b 0d 09 |e == EM_|Hex) {..|
|00001930| 09 73 70 20 3d 20 28 50 | 74 72 29 20 26 67 53 65 |.sp = (P|tr) &gSe|
|00001940| 61 72 63 68 54 65 78 74 | 5b 31 5d 3b 0d 09 09 64 |archText|[1];...d|
|00001950| 70 20 3d 20 28 50 74 72 | 29 20 26 67 53 65 61 72 |p = (Ptr|) &gSear|
|00001960| 63 68 42 75 66 66 65 72 | 5b 31 5d 3b 0d 09 09 6c |chBuffer|[1];...l|
|00001970| 6f 46 6c 61 67 20 3d 20 | 66 61 6c 73 65 3b 0d 09 |oFlag = |false;..|
|00001980| 09 66 6f 72 20 28 69 20 | 3d 20 30 3b 20 69 20 3c |.for (i |= 0; i <|
|00001990| 20 67 53 65 61 72 63 68 | 54 65 78 74 5b 30 5d 3b | gSearch|Text[0];|
|000019a0| 20 2b 2b 69 2c 2b 2b 73 | 70 29 20 7b 0d 09 09 09 | ++i,++s|p) {....|
|000019b0| 69 66 20 28 2a 73 70 20 | 3d 3d 20 27 30 27 20 26 |if (*sp |== '0' &|
|000019c0| 26 20 2a 28 73 70 2b 31 | 29 20 3d 3d 20 27 78 27 |& *(sp+1|) == 'x'|
|000019d0| 29 20 7b 0d 09 09 09 09 | 6c 6f 46 6c 61 67 20 3d |) {.....|loFlag =|
|000019e0| 20 30 3b 0d 09 09 09 09 | 2b 2b 73 70 3b 0d 09 09 | 0;.....|++sp;...|
|000019f0| 09 09 2b 2b 69 3b 0d 09 | 09 09 09 63 6f 6e 74 69 |..++i;..|...conti|
|00001a00| 6e 75 65 3b 0d 09 09 09 | 7d 0d 09 09 09 69 66 20 |nue;....|}....if |
|00001a10| 28 69 73 73 70 61 63 65 | 28 2a 73 70 29 20 7c 7c |(isspace|(*sp) |||
|00001a20| 20 69 73 70 75 6e 63 74 | 28 2a 73 70 29 29 20 7b | ispunct|(*sp)) {|
|00001a30| 0d 09 09 09 09 6c 6f 46 | 6c 61 67 20 3d 20 30 3b |.....loF|lag = 0;|
|00001a40| 0d 09 09 09 09 63 6f 6e | 74 69 6e 75 65 3b 0d 09 |.....con|tinue;..|
|00001a50| 09 09 7d 0d 09 09 09 69 | 66 20 28 2a 73 70 20 3e |..}....i|f (*sp >|
|00001a60| 3d 20 27 30 27 20 26 26 | 20 2a 73 70 20 3c 3d 20 |= '0' &&| *sp <= |
|00001a70| 27 39 27 29 0d 09 09 09 | 09 76 61 6c 20 3d 20 2a |'9')....|.val = *|
|00001a80| 73 70 20 2d 20 27 30 27 | 3b 0d 09 09 09 65 6c 73 |sp - '0'|;....els|
|00001a90| 65 20 69 66 20 28 2a 73 | 70 20 3e 3d 20 27 41 27 |e if (*s|p >= 'A'|
|00001aa0| 20 26 26 20 2a 73 70 20 | 3c 3d 20 27 46 27 29 0d | && *sp |<= 'F').|
|00001ab0| 09 09 09 09 76 61 6c 20 | 3d 20 30 78 30 41 20 2b |....val |= 0x0A +|
|00001ac0| 20 28 2a 73 70 20 2d 20 | 27 41 27 29 3b 0d 09 09 | (*sp - |'A');...|
|00001ad0| 09 65 6c 73 65 20 69 66 | 20 28 2a 73 70 20 3e 3d |.else if| (*sp >=|
|00001ae0| 20 27 61 27 20 26 26 20 | 2a 73 70 20 3c 3d 20 27 | 'a' && |*sp <= '|
|00001af0| 66 27 29 0d 09 09 09 09 | 76 61 6c 20 3d 20 30 78 |f').....|val = 0x|
|00001b00| 30 41 20 2b 20 28 2a 73 | 70 20 2d 20 27 61 27 29 |0A + (*s|p - 'a')|
|00001b10| 3b 0d 09 09 09 65 6c 73 | 65 0d 09 09 09 09 67 6f |;....els|e.....go|
|00001b20| 74 6f 20 48 65 78 45 72 | 72 6f 72 3b 0d 09 09 09 |to HexEr|ror;....|
|00001b30| 69 66 20 28 6c 6f 46 6c | 61 67 29 20 7b 0d 09 09 |if (loFl|ag) {...|
|00001b40| 09 09 2a 28 64 70 2d 31 | 29 20 3d 20 28 2a 28 64 |..*(dp-1|) = (*(d|
|00001b50| 70 2d 31 29 20 3c 3c 20 | 34 29 20 7c 20 76 61 6c |p-1) << |4) | val|
|00001b60| 3b 0d 09 09 09 09 6c 6f | 46 6c 61 67 20 3d 20 30 |;.....lo|Flag = 0|
|00001b70| 3b 0d 09 09 09 7d 09 09 | 09 0d 09 09 09 65 6c 73 |;....}..|.....els|
|00001b80| 65 20 7b 0d 09 09 09 09 | 2a 64 70 20 3d 20 76 61 |e {.....|*dp = va|
|00001b90| 6c 3b 0d 09 09 09 09 2b | 2b 64 70 3b 0d 09 09 09 |l;.....+|+dp;....|
|00001ba0| 09 6c 6f 46 6c 61 67 20 | 3d 20 31 3b 0d 09 09 09 |.loFlag |= 1;....|
|00001bb0| 7d 0d 09 09 7d 0d 09 09 | 67 53 65 61 72 63 68 42 |}...}...|gSearchB|
|00001bc0| 75 66 66 65 72 5b 30 5d | 20 3d 20 28 6c 6f 6e 67 |uffer[0]| = (long|
|00001bd0| 29 20 64 70 20 2d 20 28 | 6c 6f 6e 67 29 20 26 67 |) dp - (|long) &g|
|00001be0| 53 65 61 72 63 68 42 75 | 66 66 65 72 5b 31 5d 3b |SearchBu|ffer[1];|
|00001bf0| 0d 09 09 69 66 20 28 67 | 53 65 61 72 63 68 42 75 |...if (g|SearchBu|
|00001c00| 66 66 65 72 5b 30 5d 20 | 3d 3d 20 30 29 0d 09 09 |ffer[0] |== 0)...|
|00001c10| 09 67 6f 74 6f 20 48 65 | 78 45 72 72 6f 72 3b 0d |.goto He|xError;.|
|00001c20| 09 7d 0d 09 65 6c 73 65 | 20 7b 0d 09 09 42 6c 6f |.}..else| {...Blo|
|00001c30| 63 6b 4d 6f 76 65 28 67 | 53 65 61 72 63 68 54 65 |ckMove(g|SearchTe|
|00001c40| 78 74 2c 20 67 53 65 61 | 72 63 68 42 75 66 66 65 |xt, gSea|rchBuffe|
|00001c50| 72 2c 20 67 53 65 61 72 | 63 68 54 65 78 74 5b 30 |r, gSear|chText[0|
|00001c60| 5d 2b 31 29 3b 0d 09 7d | 0d 09 72 65 74 75 72 6e |]+1);..}|..return|
|00001c70| 20 74 72 75 65 3b 0d 48 | 65 78 45 72 72 6f 72 3a | true;.H|exError:|
|00001c80| 0d 09 45 72 72 6f 72 41 | 6c 65 72 74 28 45 53 5f |..ErrorA|lert(ES_|
|00001c90| 43 61 75 74 69 6f 6e 2c | 20 22 4f 6e 6c 79 20 76 |Caution,| "Only v|
|00001ca0| 61 6c 69 64 20 48 65 78 | 20 76 61 6c 75 65 73 20 |alid Hex| values |
|00001cb0| 6d 61 79 20 62 65 20 75 | 73 65 64 22 29 3b 0d 09 |may be u|sed");..|
|00001cc0| 72 65 74 75 72 6e 20 66 | 61 6c 73 65 3b 0d 7d 0d |return f|alse;.}.|
|00001cd0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ce0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001cf0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d00| 00 00 01 00 00 00 01 76 | 00 00 00 76 00 00 00 46 |.......v|...v...F|
|00001d10| 22 68 12 00 dc 4e 91 7f | 11 26 68 01 00 36 14 2f |"h...N..|.&h..6./|
|00001d20| 0b 20 53 20 50 22 68 28 | f3 01 fe 3e c8 58 27 28 |. S P"h(|...>.X'(|
|00001d30| 0b 48 65 78 53 65 61 72 | 63 68 2e 63 02 00 00 00 |.HexSear|ch.c....|
|00001d40| 54 45 58 54 4b 41 48 4c | 01 00 00 34 01 00 00 00 |TEXTKAHL|...4....|
|00001d50| 00 00 54 45 58 54 4b 41 | 48 4c 01 00 00 34 01 00 |..TEXTKA|HL...4..|
|00001d60| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001d70| 00 00 a8 59 d9 6a 00 00 | 1c 50 00 00 01 bc 7f 01 |...Y.j..|.P......|
|00001d80| 08 e8 a3 01 00 25 73 01 | 10 80 2b 60 2e 60 7f 27 |.....%s.|..+`.`.'|
|00001d90| 14 01 6c 4e 91 4a 00 58 | 8f 01 66 14 25 01 30 8a |..lN.J.X|..f.%.0.|
|00001da0| 9d 67 d8 25 12 16 22 58 | 8f 14 28 6e ff fc 4e 5e |.g.%.."X|..(n..N^|
|00001db0| 4e 75 63 79 5c 9b 2e 7f | 2c 02 00 98 56 c0 fb 9d |Nucy\...|,...V...|
|00001dc0| 8e 01 00 d4 25 13 30 aa | 4a 00 58 8f 8e 01 00 c6 |....%.0.|J.X.....|
|00001dd0| 60 7f 27 2f 8e 02 00 b2 | 7e 00 57 5f 50 01 13 da |`.'/....|~.W_P...|
|00001de0| 67 6b 01 00 86 da 5b 01 | 67 7e 59 5b 58 29 4d 51 |gk....[.|g~Y[X)MQ|
|00001df0| b7 5b 12 b0 a8 00 1c 01 | 66 68 f3 26 c0 79 58 b7 |.[......|fh.&.yX.|
|00001e00| 00 00 00 26 00 02 00 14 | 00 00 10 8d 00 c1 00 40 |...&....|.......@|
|00001e10| 7e 0c 00 00 05 61 64 64 | 72 20 00 10 00 00 10 f2 |~....add|r ......|
|00001e20| 00 c4 00 40 7d fc 00 00 | 01 72 00 00 00 48 00 09 |...@}...|.r...H..|
|00001e30| 4d 6f 6e 61 63 6f 00 00 | 00 00 00 00 00 00 00 00 |Monaco..|........|
|00001e40| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001e50| 00 06 00 04 00 2a 00 18 | 01 dd 02 7d 00 43 00 49 |.....*..|...}.C.I|
|00001e60| 01 9c 01 f7 aa ab 6b 15 | 00 00 17 be 00 00 17 c4 |......k.|........|
|00001e70| 00 00 00 00 00 00 00 00 | 01 00 00 00 01 76 00 00 |........|.....v..|
|00001e80| 00 76 00 00 00 46 00 67 | 3e 00 10 88 00 00 00 1c |.v...F.g|>.......|
|00001e90| 00 46 00 01 44 54 56 55 | 00 00 00 12 4d 50 53 52 |.F..DTVU|....MPSR|
|00001ea0| 00 00 00 1e 21 e2 ff ff | 00 00 00 00 00 00 00 00 |....!...|........|
|00001eb0| 03 ed ff ff 00 00 00 2a | 00 67 3c 04 00 00 00 00 |.......*|.g<.....|
|00001ec0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ed0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ee0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
|00001ef0| 00 00 00 00 00 00 00 00 | 00 00 00 00 00 00 00 00 |........|........|
+--------+-------------------------+-------------------------+--------+--------+